VC6.0中使用ADO操作Access数据库

扫一扫
分享文章到微信
扫一扫
关注官方公众号
至顶头条

ADO提供了一组非常简单，将一般通用的数据访问细节进行封装的对象。

作者：徐景周来源：yesky 2007年10月22日

关键字：

打开数据表 打开库内表名为DemoTable的数据表，代码如下：

_RecordsetPtr m_pRecordset;
m_pRecordset.CreateInstance(__uuidof(Recordset));

// 在ADO操作中建议语句中要常用try...catch()来捕获错误信息，
// 因为它有时会经常出现一些意想不到的错误。jingzhou xu
try
{
m_pRecordset->Open("SELECT * FROM DemoTable", // 查询DemoTable表中所有字段
theApp.m_pConnection.GetInterfacePtr(), // 获取库接库的IDispatch指针
adOpenDynamic,
adLockOptimistic,
adCmdText);
}
catch(_com_error *e)
{
AfxMessageBox(e->ErrorMessage());
}

　　 读取表内数据 将表内数据全部读出并显示在列表框内，m_AccessList为列表框的成员变量名。如果没有遇到表结束标志adoEOF，则用GetCollect(字段名)或m_pRecordset->Fields->GetItem(字段名)->Value方法，来获取当前记录指针所指的字段值，然后再用MoveNext()方法移动到下一条记录位置。代码如下所示：

_variant_t var;
CString strName,strAge;
try
{
if(!m_pRecordset->BOF)
m_pRecordset->MoveFirst();
else
{
AfxMessageBox("表内数据为空");
return;
}

// 读入库中各字段并加入列表框中
while(!m_pRecordset->adoEOF)
{
var = m_pRecordset->GetCollect("Name");
if(var.vt != VT_NULL)
strName = (LPCSTR)_bstr_t(var);
var = m_pRecordset->GetCollect("Age");
if(var.vt != VT_NULL)
strAge = (LPCSTR)_bstr_t(var);

m_AccessList.AddString( strName + " --> "+strAge );

m_pRecordset->MoveNext();
}

// 默认列表指向第一项，同时移动记录指针并显示
m_AccessList.SetCurSel(0);
}
catch(_com_error *e)
{
AfxMessageBox(e->ErrorMessage());
}

VIP专区

VIP用户

普通用户

闂侇収鍠曞▎銏㈡媼閵忋倖顫�

濠碘€冲€归悘澶愬箖閵娾晜濮滈悽顖涚摃閹烩晠宕氶崶鈺傜暠闁诡垰鍘栫花锛勬喆椤ゅ弧濡澘妫楅悡娆撳嫉閳ь剟寮０渚€鐛撻柛婵呮缁楀矂骞庨埀顒勫嫉椤栨瑤绻嗛柟顓у灲缁辨繈鏌囬敐鍕杽閻犱降鍨藉Σ鍕嚊閹跺鈧﹦绱旈幋鐐参楅柡鍫灦閸嬫牗绂掔捄铏规闁哄嫷鍨遍崑宥夋儍閸曨剚浠樺ù锝嗗▕閳ь剚鏌ㄧ欢鐐寸▕鐎ｂ晝顏遍柕鍡嫹

重磅专题

往期文章

VC6.0中使用ADO操作Access数据库

业界热点: